Imports pixolut.BizBlox

Public Class Student
    Inherits DataObject

'START BizBlox Generated Code : Do not remove or alter this comment
'Last Updated : Tuesday, 24 August 2004 4:01:21 PM
'BizBlox Version : 0.9.1.22818
#Region "BizBlox Generated Code"

    Public Shadows Enum Columns
        StudentID
        Name
        Email
        Age
    End Enum

    Public Overrides Function UidColumn() As [enum]
        Return Columns.StudentID
    End Function

    Public Overrides Function TableName() As String
        Return "Student"
    End Function

    Public Sub New()
        MyBase.New()
    End Sub

    Public Sub New(ByVal uid As Guid)
        MyBase.New(uid)
    End Sub


    Private m_StudentID As System.Guid
    Public Property StudentID() As System.Guid
        Get
            Return m_StudentID
        End Get
        Set(ByVal Value As System.Guid)
            Me.touch()
            m_StudentID = Value
        End Set
    End Property

    Private m_Name As System.String
    Public Property Name() As System.String
        Get
            Return m_Name
        End Get
        Set(ByVal Value As System.String)
            Me.touch()
            Me.BoundsCheck(Columns.Name, Value , 256)
            m_Name = Value
        End Set
    End Property

    Private m_Email As System.String
    Public Property Email() As System.String
        Get
            Return m_Email
        End Get
        Set(ByVal Value As System.String)
            Me.touch()
            Me.BoundsCheck(Columns.Email, Value , 256)
            m_Email = Value
        End Set
    End Property

    Private m_Age As System.Int32
    Public Property Age() As System.Int32
        Get
            Return m_Age
        End Get
        Set(ByVal Value As System.Int32)
            Me.touch()
            m_Age = Value
        End Set
    End Property
#End Region
'END BizBlox Generated Code : Do not remove or alter this comment

End Class




